macro '[a]adjust roi to 128';
var
 i: integer;
begin
    resetCounter;
    SetOptions('Area,Mean,Std. Dev.,X-Y Center,Mode,Perimeter,Major, Minor, Angle,  Int. Den., Min/Max, User1, User2');
    measure;
    AddConstant(128-rMean[1]);
end;